1) WEAVE.WEB[WEB,DEK] and 2) WEAVE.WEB[WEB,ALS]	8-05-82 14:15	pages 17,17

**** File 1) WEAVE.WEB[WEB,DEK]/17P/193L
1)		alpha: @<Cases for |alpha|@>;
1)		case_head: @<Cases for |case_head|@>;
**** File 2) WEAVE.WEB[WEB,ALS]/17P/193L
2)		alpha: alpha_cases;
2)		case_head: @<Cases for |case_head|@>;
***************


**** File 1) WEAVE.WEB[WEB,DEK]/17P/213L
1)	explained.
1)	@<Declaration of the |five_cases| procedure@>=
**** File 2) WEAVE.WEB[WEB,ALS]/17P/213L
2)	explained. Also included is a separate procedure foe the |alpha| case.
2)	@<Declaration of the |five_cases| procedure@>=
***************


**** File 1) WEAVE.WEB[WEB,DEK]/17P/229L
1)	@ Now comes the code that tries to match each production that starts
**** File 2) WEAVE.WEB[WEB,ALS]/17P/229L
2)	procedure alpha_cases; {a subprocedure called in the above case statement}
2)	label found;
2)	begin @<Cases for |alpha|@>;
2)	found: end;
2)	@ Now comes the code that tries to match each production that starts
***************